VBA code to insert serial numbers in excel automatically